1 POKE50257,8:POKE50259,208:POKE50260,017:POKE50261,236:POKE50262,027
5 T$="[147][153]   [200][201][204][198][211][208][210][207][199][210][193][205][205]: [203][193][211][211][197][212][212][197][206]-[196][201][210][197][195][212][207][210][217]   [146][158]"
10 POKE53280,11:POKE53281,11:PRINT"[147][158]"CHR$(14)CHR$(8);
20 PRINTT$"[203]ASSETTENBERGE OHNE [194]ESCHRIFTUNG,"
30 PRINT"STUNDENLANGES [211]UCHEN NACH EINEM BESTIMM-";
40 PRINT"TEN [208]ROGRAMM UND SO WEITER..."
50 PRINT:PRINT"[196]AS [208]ROGRAMM [203][193][211][211][197][212][212][197][206]-[196][201][210][197][195][212][207][210][217] MACHT"
60 PRINT"DEM EIN [197]NDE. [215]ENN [211]IE ES MIT [195][212][210][204] & S"
70 PRINT"AUS DEM [205]AGAZIN HERAUS ABGESPEICHERT"
80 PRINT"HABEN, LADEN [211]IE ES VOM EIGENEN [196]ATEN-"
90 PRINT"TRAEGER EIN UND STARTEN ES WIE GEWOHNT"
100 PRINT"MIT [210][213][206].":PRINT
110 PRINT"[196]URCHSUCHT WERDEN KOENNEN [203]ASSETTEN,"
120 PRINT"DIE MIT [211]UPER[212]APE BESPIELT WORDEN SIND"
130 PRINT"(S WAEHLEN, [211]UPERTAPE MUSS VORHER GE-"
140 PRINT"LADEN SEIN!) UND [203]ASSETTEN MIT [208]ROGRAM-"
150 PRINT"MEN, DIE IM [195]OMMODORE-[198]ORMAT AUFGEZEICH-";
160 PRINT"NET WURDEN (C DRUECKEN)."
170 PRINT:PRINT"[196]URCHSUCHEN [211]IE KEINE [205]ISCHKASSETTEN,"
180 PRINT"DIES KANN ZU [208]ROGRAMMABSTUERZEN FUEHREN.";
190 GOSUB20000
200 PRINTT$"[201]HRE [203]ASSETTE MIT DEN VIELEN UNBEKANNTEN";
210 PRINT"[208]ROGRAMMEN HABEN SIE EINGELEGT, DANN "
220 PRINT"ENTWEDER C ODER S GEWAEHLT UND DIE [208][204][193][217]-";
230 PRINT"[212]ASTE NACH [193]UFFORDERUNG GEDRUECKT.":PRINT
240 PRINT"[196]ER [194]ILDSCHIRM GEHT AUS, ES GESCHIEHT"
250 PRINT"ZUNAECHST NICHTS.":PRINT
260 PRINT"[215]IE KOMMEN [211]IE VOM [205]ODUS '[196]URCHSUCHEN"
270 PRINT"DES [194]ANDES' ZUR GEWUENSCHTEN [194]ILDSCHIRM-";
280 PRINT"ODER [196]RUCKERAUSGABE?"
290 GOSUB20000
300 PRINTT$;"[215]ENN [211]IE C GEWAEHLT HATTEN, DANN DRUEK-"
310 PRINT"KEN [211]IE DIE [210][213][206]/[211][212][207][208]-[212]ASTE."
320 PRINT:PRINT"[196]AS [208]ROGRAMM SPRINGT DANN IN DIE [194]ILD-"
330 PRINT"SCHIRMAUSGABE.":PRINT
340 PRINT"[195]OMMODORE-[203]ASSETTEN: [210][213][206]/[211][212][207][208]-[212][193][211][212][197][146][158]":PRINT
350 PRINT:PRINT:PRINT"[194]EIM [211]UCHLAUF NACH [211]UPER[212]APE-[208]ROGRAMMEN"
360 PRINT"KOENNEN [211]IE AM [194]ANDENDE DURCH GLEICHZEI-";
370 PRINT"TIGES [196]RUECKEN VON [210][197][211][212][207][210][197] UND [211][200][201][198][212]":PRINT"ANHALTEN.":PRINT
385 PRINT"[211]UPER[212]APE-[203]ASSETTEN: [210][197][211][212][207][210][197] & [211][200][201][198][212][146][158]"
399 GOSUB20000
400 PRINTT$;"[193]USGEGEBEN WERDEN [208]ROGRAMMTYP ([194][193][211][201][195]-"
410 PRINT"BZW. [205]ASCHINENPROGRAMM), [204]AENGE UND"
420 PRINT"[211]TARTADRESSE DES [208]ROGRAMMS."
430 PRINT:PRINT"[197]INE GENAUE [194]ESCHREIBUNG DER [193]USWERTUNG"
440 PRINT"FINDEN [211]IE IM [194]EIHEFT.":PRINT
450 PRINT"[211]IE KOENNEN SICH DIE [197]RGEBNISSE AUCH AUF";
460 PRINT"DEM [196]RUCKER AUSGEBEN LASSEN. [211]TELLEN [211]IE";
470 PRINT"ABER VORHER BITTE SICHER, DASS DIESER"
480 PRINT"AUCH ANGESCHLOSSEN UND EINGESCHALTET"
490 PRINT"IST.":PRINT
492 PRINT"[206]OCH EIN [200]INWEIS: [196]IE [193]NZAHL DER [208]RO-"
494 PRINT"GRAMME PRO [194]ANDSEITE IST BESCHRAENKT"
496 PRINT"AUF 100. [196]AS DUERFTE ABER IN DEN MEISTEN";
498 PRINT"[198]AELLEN AUSREICHEN.":PRINT
600 GOSUB20000:RUN
20000 POKE198,0:FL=0:Z$="[146]>"
20005 POKE211,24:POKE214,24:SYS58640:PRINT"[153][215]EITER: [212]ASTE[146][158]";
20010 POKE211,22:POKE214,24:SYS58640:PRINTZ$;
20020 FORI=0TO080:GETW$:IFW$THENI=200:FL=1
20030 NEXT:IFFLTHENRETURN
20040 IFZ$="[146]>"THENZ$=">":GOTO20010
20050 Z$="[146]>":GOTO20010